      COMMON /ERISOP/ SGNX(8**3,12), IOFRST, NSOP(8**3,3), NSOQ(8**3,3)
